home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / pc / vikingw.dir / 01656_Script_Family < prev    next >
Text File  |  1995-09-12  |  2KB  |  86 lines
  1. global gbeenclicked, gQuest
  2.  
  3. on VFamilyRollovers
  4.   set gbeenclicked = 0
  5.   if (not(CheckClickedStatus(gQuest))) then
  6.     if rollover(6) or rollover(8) then
  7.       repeat while rollover(6) or rollover(8)
  8.         VikingCursor
  9.         puppetsprite 9, true
  10.         set the locH of sprite 9 to 555
  11.         set the locV of sprite 9 to 330
  12.         updatestage
  13.         if (the mousedown) then
  14.           set gbeenclicked = 1
  15.         else
  16.           --the mouse is up
  17.           if gbeenclicked = 1 then
  18.             repeat while gbeenclicked = 1
  19.               AnimateLoopFast 8, 35, 2, 0, 3
  20.             end repeat
  21.           end if
  22.         end if
  23.       end repeat
  24.       set the locH of sprite 9 to 999
  25.       updatestage
  26.       puppetsprite 9, false
  27.     else
  28.       if rollover(7) then
  29.         VikingCursor
  30.         repeat while rollover(7)
  31.           puppetsprite 10, true
  32.           set the locH of sprite 10 to 286
  33.           set the locV of sprite 10 to 357
  34.           updatestage
  35.           if (the mousedown) then
  36.             set gbeenclicked = 1
  37.           else
  38.             --the mouse is up
  39.             if gbeenclicked = 1 then
  40.               repeat while gbeenclicked = 1
  41.                 AnimateLoopFast 7, 37, 2, "SV140303.AIF", 2
  42.               end repeat
  43.             end if
  44.           end if
  45.         end repeat
  46.         set the locH of sprite 10 to 999
  47.         updatestage
  48.         puppetsprite 10, false
  49.       else
  50.         if rollover(11) then
  51.           ArrowCursor
  52.           repeat while rollover(11)
  53.             set the locH of sprite 12 to 397
  54.             set the locV of sprite 12 to 327
  55.             updatestage
  56.           end repeat
  57.           set the locH of sprite 12 to 999
  58.           updatestage
  59.         else
  60.           if rollover(27) then
  61.             ArrowCursor
  62.             repeat while rollover(27)
  63.               set the locH of sprite 28 to 526
  64.               set the locV of sprite 28 to 224
  65.               updatestage
  66.             end repeat
  67.             set the locH of sprite 28 to 999
  68.             updatestage
  69.           else
  70.             if rollover(41) then
  71.               HandCursor
  72.             else
  73.               if rollover(42) then
  74.                 HandCursor
  75.               else
  76.                 ArrowCursor
  77.               end if
  78.             end if
  79.           end if
  80.         end if
  81.       end if
  82.     end if
  83.   end if
  84.   RandomQuestion(gQuest)
  85. end
  86.